home *** CD-ROM | disk | FTP | other *** search
/ The Original Shareware 1.1 / The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso / 32 / bartend.zip / BARTENDR.BAS next >
BASIC Source File  |  1986-10-31  |  8KB  |  57 lines
  1. 40 CLS :COLOR 10,0,0
  2. 50 COLOR 14:LOCATE 4,14:PRINT" * * BARTENDER'S RECIPE GUIDE * *":COLOR 10:PRINT:PRINT
  3. 60 PRINT "  1.  ALEXANDER";: PRINT TAB( 30)"15. GEORGIA JULEP"
  4. 70 PRINT "  2.  AMERICAN GROG";: PRINT TAB( 30)"16. GIMLET"
  5. 80 PRINT "  3.  BACARDI COCKTAIL";: PRINT TAB( 30)"17. GIN & BITTERS"
  6. 90 PRINT "  4.  BANANA DAIQUIRI";: PRINT TAB( 30)"18. GIN & TONIC"
  7. 100 PRINT "  5.  BEER BUSTER";: PRINT TAB( 30)"19. GRASSHOPPER"
  8. 110 PRINT "  6.  BOURBON HIGHBALL";: PRINT TAB( 30)"20. HORSE'S NECK"
  9. 120 PRINT "  7.  BOURBON SOUR";: PRINT TAB( 30)"21. HOT BUTTERED RUM"
  10. 130 PRINT "  8.  BULL'S EYE";: PRINT TAB( 30)"22. LADY BE GOOD"
  11. 140 PRINT "  9.  CAFE ROYAL";: PRINT TAB( 30)"23. LADY FINGER"
  12. 150 PRINT "  10. CHAMPAGNE COCKTAIL";: PRINT TAB( 30)"24. MANHATTAN"
  13. 160 PRINT "  11. COMPUTER NIGHTMARE";: PRINT TAB( 30)"25. MARGARITA"
  14. 170 PRINT "  12. CREME DE MENTHE";: PRINT TAB( 30)"26. MARTINI"
  15. 180 PRINT "  13. DAIQUIRI";: PRINT TAB( 30)"27. NIGHT CAP"
  16. 190 PRINT "  14. DIXIE JULEP";: PRINT TAB( 30)"28. TBS DAYTIMER": PRINT
  17. 200 INPUT "  ENTER THE NUMBER OF YOUR CHOICE (or 29 to END)";TT
  18. 210 CLS :LOCATE 2,3:PRINT" ";
  19. 220 ON TT GOTO 230,240,250,260,290,340,330,350,360,380,300,390,400,410,420,440,450,460,470,480,490,500,510,520,530,550,570,310,600
  20. 230 LOCATE 4,3:PRINT "ALEXANDER COCKTAIL": PRINT : PRINT "1 OZ DRY GIN": PRINT "1 OZ CREME DE CACAO (WHITE)": PRINT "1 OZ SWEET CREAM": PRINT : PRINT "SHAKE WITH ICE, STRAIN, AND POUR OVER ICE.  SPRINKLE WITH": PRINT "NUTMEG.": GOTO 580
  21. 240 PRINT "AMERICAN GROG": PRINT : PRINT "1 LUMP SUGAR": PRINT "JUICE 1/4 LEMON": PRINT "1 1/2 OZ RUM": PRINT : PRINT "HEAT A GLASS AND WATER.  POUR THE INGREDIENTS AND HOT WATER": PRINT "INTO THE HOT GLASS.  STIR.": GOTO 580
  22. 250 PRINT "BACARDI COCKTAIL": PRINT : PRINT "1 1/2 OZ. BACARDI RUM": PRINT "JUICE 1/2 LIME": PRINT "1/2 TEASPOON GRENADINE": PRINT : PRINT "SHAKE WITH ICE AND STRAIN INTO GLASS.": GOTO 580
  23. 260 PRINT "BANANA DAIQUIRI": PRINT : PRINT "1 1/2 OZ RUM": PRINT "1 1/4 OZ LIME JUICE": PRINT "1 TBLSPOON CURACAO": PRINT "1 TEASPOON SUGAR": PRINT "1 SLICED BANANA": PRINT "1 CUP CRUSHED ICE"
  24. 270 PRINT : PRINT "POUR INGREDIENTS IN A BLENDER AND RUN ON LOW FOR 5 SECONDS
  25. 280 PRINT "THEN TURN ON HIGH SPEED UNTIL FIRM.": PRINT "SERVE WITH CHERRY ON TOP": GOTO 580
  26. 290 PRINT "BEER BUSTER": PRINT : PRINT "1 1/4 OZ 100 PROOF VODKA": PRINT "1 COLD BEER": PRINT "2 DASHES OF TABASCO SAUCE": PRINT : PRINT "POUR INGREDIENTS INTO A GLASS AND STIR LIGHTLY": GOTO 580
  27. 300 PRINT "COMPUTER NIGHTMARE": PRINT : PRINT "2 OZ COFFEE FLAVORED BRANDY": PRINT "2 OZ RUM": PRINT "1/2 CUP DEEP BLACK COFFEE": PRINT "2 TEASPOONS POWDERED SUGAR": PRINT : PRINT "STIR IN SNIFFER AND ADD ICE (CRACKED)": GOTO 580
  28. 310 PRINT "TBS DAYTIMER": PRINT : PRINT "1 1/2 OZ VODKA": PRINT "3 OZ TOMATO JUICE": PRINT "DASH LEMON JUICE": PRINT "DASH TABASCO SAUCE": PRINT "SALT": PRINT "PEPPER": PRINT "CELERY"
  29. 320 PRINT : PRINT "SHAKE WITH ICE AND STRAIN INTO GLASS. SERVE WITH CELERY IN": PRINT "GLASS.":GOTO 580
  30. 330 PRINT "BOURBON SOUR": PRINT : PRINT "2 OZ WHISKEY": PRINT "1 EGG WHITE": PRINT "JUICE 1/2 LEMON": PRINT "1 TEASPOON POWDERED SUGAR": PRINT : PRINT "SHAKE WITH CRACKED ICE - ADD LEMON SLICE AND CHERRY": GOTO 580
  31. 340 PRINT "BOURBON HIGHBALL": PRINT : PRINT "2 OZ WHISKEY": PRINT "GINGER ALE": PRINT "ICE": PRINT : PRINT "POUR INTO GLASS - ADD LEMON PEEL (OPTIONAL) - STIR": GOTO 580
  32. 350 PRINT "BULL'S EYE": PRINT : PRINT "1 OZ BRANDY": PRINT "2 OZ HARD CIDER": PRINT "GINGER ALE": PRINT : PRINT "POUR INGREDIENTS INTO GLASS WITH ICE AND STIR.": GOTO 580
  33. 360 PRINT "CAFE ROYAL": PRINT : PRINT "1 LUMP OF SUGAR": PRINT "HIGH PROOF BRANDY": PRINT : PRINT "SOAK LUMP OF SUGAR IN BRANDY.  IGNITE IN TEASPOON WHILE HOLDING": PRINT "IT OVER A CUP OF COFFEE.  HOLD UNTIL IT BURNS OUT.  STIR INTO"
  34. 370 PRINT "COFFEE.": GOTO  580
  35. 380 PRINT "CHAMPAGNE COCKTAIL": PRINT : PRINT "1 LUMP OF SUGAR": PRINT "2 DASHES OF BITTERS": PRINT "CHAMPAGNE": PRINT : PRINT "POUR INGREDIENTS INTO GLASS - FILL WITH CHAMPAGNE.  ADD LEMON": PRINT "PEEL TWIST.": GOTO 580
  36. 390 PRINT "CREME DE MENTHE": PRINT : PRINT "CREME DE MENTHE (GREEN)": PRINT "SHAVED ICE": PRINT : PRINT "FILL GLASS WITH SHAVED ICE.  POUR IN CREME DE MENTHE.  SERVE": PRINT "WITH TWO STRAWS.": GOTO 580
  37. 400 PRINT "DAIQUIRI": PRINT : PRINT "JUICE 1 LIME": PRINT "1 TEASPOON POWDERED SUGAR": PRINT "1 1/2 OZ RUM": PRINT : PRINT "SHAKE WITH ICE AND STRAIN INTO GLASS.": GOTO 580
  38. 410 PRINT "DIXIE JULEP": PRINT : PRINT "1 TEASPOON POWDERED SUGAR": PRINT "2 1/2 OZ BOURBON WHISKEY": PRINT "ICE": PRINT : PRINT "FILL GLASS WITH ICE.  POUR IN INGREDIENTS.  STIR UNTIL GLASS IS": PRINT "FROSTED.  DECORATE WITH MINT ": GOTO 580
  39. 420 PRINT "GEORGIA JULEP": PRINT : PRINT "2 MINT LEAVES": PRINT "1 1/2 OZ BRANDY": PRINT "1 OZ PEACH BRANDY": PRINT "1 TEASPOON SUGAR": PRINT : PRINT "PUT MINT LEAVES IN GLASS WITH THE ICE."
  40. 430 PRINT "POUR IN INGREDIENTS. DECORATE WITH MINT LEAVES.": GOTO  580
  41. 440 PRINT "GIMLET": PRINT : PRINT "1 OZ LIME JUICE": PRINT "1 1/2 OZ DRY GIN": PRINT "1 TEASPOON SUGAR": PRINT : PRINT "SHAKE WITH ICE AND STRAIN INTO THE GLASS.": GOTO 580
  42. 450 PRINT "GIN AND BITTERS": PRINT : PRINT "1/2 TEASPOON BITTERS": PRINT "DRY GIN": PRINT : PRINT "GRADUALLY POUR BITTERS INTO GLASS AND SWIRL GLASS UNTIL THE": PRINT "GLASS IS COATED WITH THE BITTERS.  FILL GLASS WITH DRY GIN": GOTO 580
  43. 460 PRINT "GIN AND TONIC": PRINT : PRINT "2 OZ GIN": PRINT "QUININE WATER": PRINT : PRINT "POUR GIN OVER ICE AND FILL WITH QUININE WATER.  STIR": GOTO 580
  44. 470 PRINT "GRASSHOPPER": PRINT : PRINT "2/3 OZ (GREEN) CREME DE MENTHE": PRINT "2/3 OZ SWEET CREAM": PRINT "2/3 OZ CREME DE CACAO": PRINT : PRINT "SHAKE WITH ICE AND STRAIN INTO GLASS.": GOTO 580
  45. 480 PRINT "HORSE'S NECK": PRINT : PRINT "2 OZ BLENDED WHISKEY": PRINT "GINGER ALE": PRINT "SPIRAL PEEL OF LEMON": PRINT : PRINT "HANG PEEL OVER RIM OF GLASS.  FILL WITH ICE.  ADD WHISKEY.": PRINT "FILL GLASS WITH GINGER ALE": GOTO 580
  46. 490 PRINT "HOT BUTTERED RUM": PRINT : PRINT "1 LUMP SUGAR": PRINT "2/3 GLASS BOILING WATER": PRINT "1 SQUARE BUTTER": PRINT "2 OZ RUM": PRINT : PRINT "ADD INGREDIENTS TO A HOT GLASS.  STIR.  ADD NUTMEG TO TOP.": GOTO 580
  47. 500 PRINT "LADY BE GOOD": PRINT : PRINT "1 1/2 OZ BRANDY": PRINT "1/2 OZ (WHITE) CREME DE MENTHE": PRINT "1/2 OZ SWEET VERMOUTH": PRINT : PRINT "SHAKE WITH ICE AND STRAIN INTO GLASS": GOTO 580
  48. 510 PRINT "LADY FINGER": PRINT : PRINT "1 OZ DRY GIN": PRINT "1/2 OZ KIRSCHWASSER": PRINT "1 OZ CHERRY BRANDY": PRINT : PRINT "SHAKE WITH ICE AND STRAIN INTO GLASS": GOTO 580
  49. 520 PRINT "MANHATTAN": PRINT "3/4 OZ SWEET VERMOUTH": PRINT "1 1/2 OZ BLENDED WHISKEY": PRINT : PRINT "STIR WITH ICE AND STRAIN INTO GLASS.  SERVE WITH CHERRY.": GOTO 580
  50. 530 PRINT "MARGARITA": PRINT : PRINT "1 1/2 OZ TEQUILA": PRINT "1/2 OZ TRIPLE SEC": PRINT "1 OZ LEMON OR LIME JUICE": PRINT "SALT": PRINT : PRINT "RUB RIM OF GLASS WITH LEMON OR LIME JUICE.  RUB RIM OF GLASS IN"
  51. 540 PRINT "SALT. SHAKE INGREDIENTS IN ICE AND POUR INTO  A GLASS":GOTO 580
  52. 550 PRINT "MARTINI": PRINT : PRINT "1 1/2 OZ DRY GIN": PRINT "3/4 OZ VERMOUTH": PRINT : PRINT "FROST GLASS PITCHER AND GLASS.  POUR IN THE GIN FIRST.  THEN": PRINT "THE VERMOUTH.  STIR WITH VERY COLD DRY (NOT WET) ICE.  STRAIN"
  53. 560 PRINT "INTO GLASS. SERVE WITH OLIVE.":GOTO 580
  54. 570 PRINT "NIGHT CAP": PRINT : PRINT "2 OZ RUM": PRINT "1 TEASPOON POWDERED SUGAR": PRINT "WARM MILK": PRINT : PRINT "POUR INGREDIENTS IN A GLASS OR MUG AND SPRINKLE WITH": PRINT "NUTMEG": GOTO 580
  55. 580 PRINT : PRINT : INPUT "PRESS ENTER WHEN READY TO CONTINUE";V: CLS :V=0: CLS : GOTO 50
  56. 600 SYSTEM:END
  57.